www.gusucode.com > 酷维企业网站CMS管理系统 v2.1.0 > 酷维企业网站CMS管理系统 v2.1.0\code\NewsAdmin\al.asp
<%@LANGUAGE="VBSCRIPT" CODEPAGE="936"%>
<!--#include file="conn.asp" -->
<!--#include file="pass.asp" -->
<% if request("wang")="add" then
bt=request("bt")
nr=request("nr")
lei=request("lei")
tu=request("tu")
ly=request("ly")
zz=request("zz")
color=request("color")
set rs= Server.CreateObject("adodb.recordset")
sql="select * from news"
rs.open sql,conn,1,3
rs.addnew
rs("bt")=bt
rs("mytype")=lei
rs("nr")=nr
rs("tu")=tu
rs("ly")=ly
rs("zz")=zz
rs("color")=color
rs.update
response.Redirect("newsup.asp")
end if
%>
<!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Transitional//EN" "http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd">
<html xmlns="http://www.w3.org/1999/xhtml">
<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312" />
<title>无标题文档</title>
<style type="text/css">
<!--
body,td,th {
font-size: 12px;
color: #000000;
}
.STYLE1 {
color: #FFFFFF;
font-weight: bold;
}
-->
</style></head>
<body>
<form id="form1" name="form1" method="post" action="news.asp?wang=add">
<table width="93%" border="0" align="center" cellpadding="1" cellspacing="1" bgcolor="#5580D5">
<tr>
<td height="28" colspan="2" align="center" background="images/admin_bg_1.gif"><b><font color="#FFFFFF">文章添加</font></b></td>
</tr>
<tr>
<td width="12%" height="28" align="center" bgcolor="#FFFFFF">文章标题</td>
<td width="88%" bgcolor="#FFFFFF">
<input name="bt" type="text" id="bt" size="50" />
<select name='Color' id='Color'>
<option value='' selected="selected">颜色</option>
<option value=''>默认</option>
<option value='#000000' style='background-color:#000000'></option>
<option value='#FFFFFF' style='background-color:#FFFFFF'></option>
<option value='#008000' style='background-color:#008000'></option>
<option value='#800000' style='background-color:#800000'></option>
<option value='#808000' style='background-color:#808000'></option>
<option value='#000080' style='background-color:#000080'></option>
<option value='#800080' style='background-color:#800080'></option>
<option value='#808080' style='background-color:#808080'></option>
<option value='#FFFF00' style='background-color:#FFFF00'></option>
<option value='#00FF00' style='background-color:#00FF00'></option>
<option value='#00FFFF' style='background-color:#00FFFF'></option>
<option value='#FF00FF' style='background-color:#FF00FF'></option>
<option value='#FF0000' style='background-color:#FF0000'></option>
<option value='#0000FF' style='background-color:#0000FF'></option>
<option value='#008080' style='background-color:#008080'></option>
</select></td>
</tr>
<tr>
<td height="28" align="center" bgcolor="#FFFFFF">图片</td>
<td bgcolor="#FFFFFF"> <input name="tu" type="text" id="tu" size="50" />
<input class="button" type="button" name="Submit22" value="上传图片" onclick="window.open('../Up_BookPic.asp?formname=form1&editname=tu&uppath=bookpic&filelx=jpg','','status=no,scrollbars=no,top=20,left=110,width=420,height=165')" /></td>
</tr>
<tr>
<td height="28" align="center" bgcolor="#FFFFFF">文章分类</td>
<td bgcolor="#FFFFFF">
<select name="lei" size="1" id="lei">
<option value="69" selected="selected">成功案列</option>
</select></td>
</tr>
<tr>
<td height="25" align="center" bgcolor="#FFFFFF">文章内容</td>
<td bgcolor="#FFFFFF">
<input name="nr" type="hidden" id="nr" />
<iframe id="eWebEditor1" src="ubb/ewebeditor.asp?id=nr&style=standard_coolblue1" frameborder="0" scrolling="No" width="600" height="400"></iframe></td>
</tr>
<tr>
<td height="25" align="center" bgcolor="#FFFFFF">文章来源</td>
<td bgcolor="#FFFFFF"> <input name="ly" type="text" id="ly" value="酷维科技" /></td>
</tr>
<tr>
<td height="25" align="center" bgcolor="#FFFFFF">文章作者</td>
<td bgcolor="#FFFFFF"> <input name="zz" type="text" id="zz" value="酷维科技" /></td>
</tr>
<tr>
<td height="26" colspan="2" align="center" bgcolor="#FFFFFF"><input type="submit" name="Submit" value="保 存" />
<input type="reset" name="Submit2" value="重 写" /></td>
</tr>
</table>
</form><!--#include file="boom.asp" -->
</body>
</html>
<% if request("del")<>"" then
id=request("del")
conn.execute("delete from news where id="&id)
response.Redirect("newsup.asp")
end if
%>